home *** CD-ROM | disk | FTP | other *** search
/ Private Casting / Casting One.bin / Docs / Models.dir / 00032.ls < prev    next >
Encoding:
Text File  |  1998-02-21  |  441 b   |  22 lines
  1. on mouseEnter
  2.   repeat with x = 20 to 26
  3.     set the visible of sprite x to 1
  4.   end repeat
  5.   set x to the currentSpriteNum
  6.   puppetSprite(x, 1)
  7.   set the width of sprite x to 150
  8.   set the height of sprite x to 162
  9. end
  10.  
  11. on mouseLeave
  12.   repeat with x = 21 to 26
  13.     if rollOver(x) then
  14.       exit
  15.     end if
  16.   end repeat
  17.   repeat with x = 20 to 26
  18.     set the visible of sprite x to 0
  19.   end repeat
  20.   puppetSprite(the currentSpriteNum, 0)
  21. end
  22.